100 REM ****************************
110 REM *    BEISPIEL FUER DIE     *
120 REM *     KOMBINATION VON      *
130 REM *   GRAPHIK UND SCHRIFT    *
140 REM *    IN EINER HARDCOPY     *
150 REM * MIT DEM SEIKOSHA GP-550A *
160 REM ****************************
170 REM
180 DIMT$(25)
185 LMAX=25:REM MAXIMALE TEXTLAENGE PRO ZEILE (HIER BEISPIELHAFT 25)
190 REM  TEXT ZEILENWEISE ABFRAGEN
200 PRINT"[147]";:FORT=0TO24
210 PRINTT+1CHR$(157);
220 INPUT". ZEILE ";T$(T)
230 IFLEN(T$(T))>LMAXTHENPRINT"[145][145]":GOTO210
240 T$(T)="     "+T$(T): REM ABSTAND SCHAFFEN
245 NEXTT
250 PRINT"[147]HARDCOPY ERFOLGT !"
260 REM ZEILENOPTION EINSCHALTEN
270 POKE49531,96
280 REM HARDCOPY STARTEN
290 SYS49152(1),0,1,0;:REM BEISPIELSWEISE
300 REM ZEILEN EINZELN AUS GRAPHIK UND TEXT ZUSAMMENSETZEN
310 FORI=1TO25
320 PRINTT$(I-1):REM TEXT UND CHR$(13)
330 SYS49537:REM NAECHSTE GRAPHIKZEILE BERECHNEN
340 NEXTI
350 END